function meta_analysis_LFMplot2(fb_snip,pb_snip,fb_av,pb_av,cell)

% a(1,:)=[2649         755         409         241];
% a(2,:)=[2649         393         409         241];
% a(3,:)=[2649          41         409         241];
% a(4,:)=[3115         756         409         241];
% a(5,:)=[3115         393         409         241];
% a(6,:)=[3456         755         409         241];
% a(7,:)=[3456         393         409         241];

a(1,:)=[1630   560   409   241];
a(2,:)=[1630   200   409   241];
a(3,:)=[1630   -160   409   241];
a(4,:)=[2180   560   409   241];
a(5,:)=[2180   200   409   241];
a(6,:)=[2180   -160   409   241];
a(7,:)=[2670   560   409   241];

for tnd=1:size(fb_snip,2)
    if ~isempty(fb_av{cell,tnd})
        data_lwin=15;
        data_rwin=25;
        
        curYmax=0;
        snipy=[];
        for ynd=1:length(fb_snip{cell,tnd})
            if isempty(fb_snip{cell,tnd}{ynd})
                snipy(ynd)=0;
            else
                snipy(ynd)=max([max(max(fb_snip{cell,tnd}{ynd})) max(max(pb_snip{cell,tnd}{ynd}))]);
            end
            
            curYmax=max([curYmax snipy]);
        end
        
        curYmax=max([curYmax 2]);
        
        sequ=[1 2 3 8 9 10 4 5 6 11 12 13 7];
        figure(2+tnd);
        %     set(gcf,'color','k')
        clf
        set(gcf,'pos',a(tnd,:))
        for ind=1:13
            subplot(2,7,sequ(ind))
            rectangle('position',[15 0 10 4],'facecolor',[0.95 0.95 0.95],'linestyle','none')
            if ~isempty(fb_av{cell,tnd}{ind})
                hold on
                plot(fb_snip{cell,tnd}{ind},'color',[1 0.7 0.7])
            end
            if ~isempty(pb_av{cell,tnd}{ind})
                hold on
                plot(pb_snip{cell,tnd}{ind},'color',[0.5 0.5 0.5])
            end
            if ~isempty(fb_av{cell,tnd}{ind})
                hold on
                plot(fb_av{cell,tnd}{ind},'color',[1 0 0],'LineWidth',2)
            end
            if ~isempty(pb_av{cell,tnd}{ind})
                hold on
                plot(pb_av{cell,tnd}{ind},'color',[0 0 0],'LineWidth',2)
            end
            axis tight
            axis off
            box off
            ylim([0 curYmax])
            xlim([0 data_rwin+data_lwin+1])
            drawnow
        end
    end
end
